home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / PICTURE / PIDEMO.EXE / PIDEMO.dxr / 00083.ls < prev    next >
Encoding:
Text File  |  1996-09-05  |  6.0 KB  |  144 lines
  1. on exitFrame
  2.   global x
  3.   cursor(200)
  4.   set the visible of sprite 20 to 1
  5.   set x to x + 1
  6.   if x >= 7 then
  7.     set x to 0
  8.   end if
  9.   puppetSprite(4, 1)
  10.   puppetSprite(5, 1)
  11.   puppetSprite(6, 1)
  12.   puppetSprite(7, 1)
  13.   puppetSprite(8, 1)
  14.   puppetSprite(9, 1)
  15.   puppetSprite(10, 1)
  16.   puppetSprite(11, 1)
  17.   puppetSprite(12, 1)
  18.   puppetSprite(20, 1)
  19.   set the locH of sprite 20 to the mouseH
  20.   set the locV of sprite 20 to the mouseV
  21.   if rollOver(4) then
  22.     set the castNum of sprite 4 to the number of member "capturehot"
  23.   else
  24.     if rollOver(4) = 0 then
  25.       set the castNum of sprite 4 to the number of member "capturebox"
  26.     end if
  27.   end if
  28.   if rollOver(5) then
  29.     set the castNum of sprite 5 to the number of member "createhot"
  30.   else
  31.     if rollOver(5) = 0 then
  32.       set the castNum of sprite 5 to the number of member "createbox"
  33.     end if
  34.   end if
  35.   if rollOver(6) then
  36.     set the castNum of sprite 6 to the number of member "printhot"
  37.   else
  38.     if rollOver(6) = 0 then
  39.       set the castNum of sprite 6 to the number of member "printbox"
  40.     end if
  41.   end if
  42.   if rollOver(7) then
  43.     set the castNum of sprite 7 to the number of member "picturehot"
  44.   else
  45.     if rollOver(7) = 0 then
  46.       set the castNum of sprite 7 to the number of member "picturebox"
  47.     end if
  48.   end if
  49.   if rollOver(8) then
  50.     set the castNum of sprite 8 to the number of member "helphot"
  51.   else
  52.     if rollOver(8) = 0 then
  53.       set the castNum of sprite 8 to the number of member "helpbox"
  54.     end if
  55.   end if
  56.   if rollOver(9) then
  57.     set the castNum of sprite 9 to the number of member "quithot"
  58.   else
  59.     if rollOver(9) = 0 then
  60.       set the castNum of sprite 9 to the number of member "quitbox"
  61.     end if
  62.   end if
  63.   if rollOver(10) and (the castNum of sprite 2 = the number of member "createbeg") then
  64.     set the castNum of sprite 10 to the number of member "1hotlast"
  65.   else
  66.     if rollOver(10) and (the castNum of sprite 2 = the number of member "create2") then
  67.       set the castNum of sprite 10 to the number of member "2hotlast"
  68.     else
  69.       if rollOver(10) and (the castNum of sprite 2 = the number of member "create3") then
  70.         set the castNum of sprite 10 to the number of member "3hotlast"
  71.       else
  72.         if rollOver(10) and (the castNum of sprite 2 = the number of member "createend") then
  73.           set the castNum of sprite 10 to the number of member "4hotlast"
  74.         else
  75.           if rollOver(10) = 0 then
  76.             set the castNum of sprite 10 to the number of member "capturebackbox"
  77.           end if
  78.         end if
  79.       end if
  80.     end if
  81.   end if
  82.   if rollOver(11) and (the castNum of sprite 2 = the number of member "createbeg") then
  83.     set the castNum of sprite 11 to the number of member "1hotmain"
  84.   else
  85.     if rollOver(11) and (the castNum of sprite 2 = the number of member "create2") then
  86.       set the castNum of sprite 11 to the number of member "2hotmain"
  87.     else
  88.       if rollOver(11) and (the castNum of sprite 2 = the number of member "create3") then
  89.         set the castNum of sprite 11 to the number of member "3hotmain"
  90.       else
  91.         if rollOver(11) and (the castNum of sprite 2 = the number of member "createend") then
  92.           set the castNum of sprite 11 to the number of member "4hotmain"
  93.         else
  94.           if rollOver(11) = 0 then
  95.             set the castNum of sprite 11 to the number of member "capturemainbox"
  96.           end if
  97.         end if
  98.       end if
  99.     end if
  100.   end if
  101.   if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "createbeg") and (the castNum of sprite 12 = the number of member "capturenextbox") and (x = 6) then
  102.     set the castNum of sprite 12 to the number of member "1hotblink"
  103.   else
  104.     if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "createbeg") and (the castNum of sprite 12 = the number of member "1hotblink") and (x = 6) then
  105.       set the castNum of sprite 12 to the number of member "capturenextbox"
  106.     end if
  107.   end if
  108.   if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "create2") and (the castNum of sprite 12 = the number of member "capturenextbox") and (x = 6) then
  109.     set the castNum of sprite 12 to the number of member "2hotblink"
  110.   else
  111.     if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "create2") and (the castNum of sprite 12 = the number of member "2hotblink") and (x = 6) then
  112.       set the castNum of sprite 12 to the number of member "capturenextbox"
  113.     end if
  114.   end if
  115.   if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "create3") and (the castNum of sprite 12 = the number of member "capturenextbox") and (x = 6) then
  116.     set the castNum of sprite 12 to the number of member "3hotblink"
  117.   else
  118.     if (rollOver(12) = 0) and (the castNum of sprite 2 = the number of member "create3") and (the castNum of sprite 12 = the number of member "3hotblink") and (x = 6) then
  119.       set the castNum of sprite 12 to the number of member "capturenextbox"
  120.     end if
  121.   end if
  122.   if rollOver(12) and (the castNum of sprite 2 = the number of member "createbeg") then
  123.     set the castNum of sprite 12 to the number of member "1hotnxt"
  124.   else
  125.     if rollOver(12) and (the castNum of sprite 2 = the number of member "create2") then
  126.       set the castNum of sprite 12 to the number of member "2hotnxt"
  127.     else
  128.       if rollOver(12) and (the castNum of sprite 2 = the number of member "create3") then
  129.         set the castNum of sprite 12 to the number of member "3hotnxt"
  130.       else
  131.         if rollOver(12) and (the castNum of sprite 2 = the number of member "createend") then
  132.           set the castNum of sprite 12 to the number of member "4hotnxt"
  133.         else
  134.           if (rollOver(12) = 0) and (the castNum of sprite 12 <> the number of member "1hotblink") and (the castNum of sprite 12 <> the number of member "2hotblink") and (the castNum of sprite 12 <> the number of member "3hotblink") then
  135.             set the castNum of sprite 12 to the number of member "capturenextbox"
  136.           end if
  137.         end if
  138.       end if
  139.     end if
  140.   end if
  141.   updateStage()
  142.   go(the frame)
  143. end
  144.